Imports System
Module qs

    Sub Main()

        ' 定义后再初始化变量
        Dim a As Integer
        a = 10
        ' 定义时就初始化变量
        Dim b As Integer = 20

        Console.WriteLine( a + b )
        Console.ReadKey()
    End Sub 

End Module
